source_new Subroutine

public subroutine source_new(r, out)

Arguments

Type IntentOptional Attributes Name
real :: r
real :: out